﻿Public Class u_Report
    Dim new_control As Control
    Private Sub BarButtonItem2_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
        PanelQuanLy.Controls.Remove(new_control)
        new_control = New u_ReportHoaDon
        new_control.Dock = DockStyle.Fill
        PanelQuanLy.Controls.Add(new_control)
    End Sub

    Private Sub BarButtonItem3_ItemClick(ByVal sender As System.Object, ByVal e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
        PanelQuanLy.Controls.Remove(new_control)
        new_control = New u_ReportPhieuNhap
        new_control.Dock = DockStyle.Fill
        PanelQuanLy.Controls.Add(new_control)
    End Sub
End Class
